|
Autocad VBA : Blockattribute
CAD-Huebner am 04.11.2006 um 20:07 Uhr (0)
Die Attribute hängen an den Blockreferenzen nicht am Block selbst (da hängen nur die Attributdefinitionen)Dein Code sollte dannCode:Dim BlockRef As AcadBlockReferenceenhaltenHier mal in Code von Startrek zum Abfragen von Blockattributen http://ww3.cad.de/foren/ubb/Forum259/HTML/000650.shtml#000006 (das ist aber nur einer von vielen).Am Einfachsten hier im Acad VBA Forum noch mal nach "AcDbBlockReference" und "AcadBlockReference" und-color: #FFFF99'>suchen.------------------Mit freundlichem GrußUdo Hübner
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Xrecord Laden
Stelli1 am 02.06.2008 um 11:49 Uhr (0)
Hallo Schmodi,wo liegt das Problem Speichern kannst du z.B. so:Code: xType(0) = 1001 Xvalue(0) = "IS_VBATOOL" xType(1) = 1000 Xvalue(1) = "HYDRANT" xType(2) = 1002 Xvalue(2) = "{" xType(3) = 1000 If Me.txt_Hydrantname.Text "" Then Xvalue(3) = Me.txt_Hydrantname Else Xvalue(3) = "~" End If xType(4) = 1000 If Me.com_Funktion.ListIndex -1 Then Xvalue(4) = Me.com_Funktion.List(Me.com_Funktion.ListIndex, 1) Else Xvalue(4) = "~" End If .... ogac_Entity.SetXData xType, XvalueWichtig ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Blöcke mit bestimmten Layer und-color: #FFFF99'>suchen
Stelli1 am 02.03.2007 um 16:44 Uhr (0)
Hallo,irgendwie stimmt entweder in der ersten Frage was nicht oder in der letzten Antwort. Wenn es egal ist welche Layer in den Blockdefinitionen sind sondern nur der Layer des Einfügepunktes interessieren dann kannst du es so machen:Code:Sub test() Dim sset As AcadSelectionSet On Error Resume Next Set sset = ThisDrawing.SelectionSets("MySel") If Err.Number Then Set sset = ThisDrawing.SelectionSets.Add("MySel") End If On Error GoTo 0 Dim FilterData(0 To 1) As Variant Dim FilterType(0 To 1) ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : ThisDrawing.Blocks
CAD-Huebner am 15.06.2008 um 11:29 Uhr (0)
Zitat:Original erstellt von egug:was ich eigentlich möchte ist folgendes :- block in der dwg und-color: #FFFF99'>suchen ...aber ich will den block nicht picken müssenDann mache eine Auswahl (Selection) auf alle Blockreferenzen (Insert) namens "Logo" in der Zeichnung, und Zeige dann die Atribute an.Hier hats Wilfried schon fix und fertig vorgestellt: http://ww3.cad.de/foren/ubb/Forum259/HTML/001218.shtml#000007 ------------------Mit freundlichem GrußUdo Hübnerwww.CAD-Huebner.de
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Systemfehler - warum?
Headcase am 02.11.2004 um 15:03 Uhr (0)
Hallo zusammen! Ich habe folgendes Problem mit Autocad Mechanical 2004: Nachdem ein selbstprogrammiertes Makro ordnungsgemäß ausgeführt wurde und man AutoCad schließt, stürzt es mit folgender Fehlermeldung ab: SYSTEMFEHLER: Unhandled Access Violation Reading 0x... Exception at ... Das VBA-Programm macht folgendes: -Excel als Objekt öffnen (im Hintergrund) und Tabelle vorbereiten -Nutzer wählt Nullpunkt, davor wird Koordinatensystem auf Welt gestellt -Nutzer klickt Punkte an, Koordinaten werden umgerechne ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Win-Dialog Ordner und-color: #FFFF99'>suchen öffnen?
Carsten1210 am 10.07.2007 um 20:40 Uhr (0)
Hi Einstein,Ich erinnere mich noch. Wenn ich den Code per Einzelschritt abarbeite sieht das nach der Ordnerauswahl so aus: Ich habs jetzt mal mit 2006, 2007 und 2008 und Windows XP Pro. getestet, da funktioniert alles bestens. Was für eine Windowsversion benutzt du eigentlich?!Gruß, Carsten[Diese Nachricht wurde von Carsten1210 am 10. Jul. 2007 editiert.]
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Text in Zeichnung und-color: #FFFF99'>suchen, auch in Blöcke
GeorgK am 25.11.2003 um 13:19 Uhr (0)
Hallo, wie kann ich Texte in Zeichnungen sowie in Blöcken und-color: #FFFF99'>suchen? Danke Georg
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : „Ein bisschen Theorie ist manchmal auch ganz nützlich“
mapcar am 07.11.2004 um 20:13 Uhr (0)
Nee Moony, so von oben herab war das überhaupt nicht gemeint. Es war lediglich als präventiver Hinweis gedacht für den folgenden Fall: Wer Rechtecke sucht, muss technisch besehen Polylinien und-color: #FFFF99'>suchen. Das sind nämlich die Entities, während das Konzept Rechteck in der Geometriedatenbank unbekannt ist. Und dann ist man ruckzuck bei der Aufgabenstellung Wie schreibe ich eine Funktion, die feststellt, ob eine Polylinie ein Rechteck darstellt? Das klingt trivial, dürfte aber viele schon vor echte Probleme st ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : und-color: #FFFF99'>Suchen und Ersetzen per VBA
michimueller85 am 14.12.2010 um 09:07 Uhr (0)
Hi in AutoCad gibt es ja die schöne Funktion unter Bearbeiten "und-color: #FFFF99'>Suchen und ersetzen" gibt es einen VBA Befehl mit dem ich die gleichen Möglichkeiten habe?ich will mehrere Texte und-color: #FFFF99'>suchen und ersetzen lassen!bzw. wenn ein Text nicht gefunden wurde, soll z.B über eine msgbox einen Hinweis gegeben werden!Vielen Dank (im Forum bin ich nicht wirklich fündig geworden!)
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : und-color: #FFFF99'>Suchen und Ersetzen per VBA
CADmium am 14.12.2010 um 09:13 Uhr (0)
Zitat:Original erstellt von michimueller85:Hi in AutoCad gibt es ja die schöne Funktion unter Bearbeiten "und-color: #FFFF99'>Suchen und ersetzen" gibt es einen VBA Befehl mit dem ich die gleichen Möglichkeiten habe?solche Funktionen wirst du dir mit VBA programmieren müssen ! .... dazu ist ja VBA da ... ob den Sachverhalt schon einer vor dir umgesetzt hat ???? ne Wahrscheinlichkeit dafür gibt es. In Lisp gibts da z.b. was bei www.cadmaro.de ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Besc ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : und-color: #FFFF99'>Suchen und Ersetzen per VBA
michimueller85 am 14.12.2010 um 10:21 Uhr (0)
bin leider noch nicht so fit in VBA, mir würd es erst mal reichen welchen Befehl ich brauchum einen einfach Text zu und-color: #FFFF99'>suchen! (mtext)
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : und-color: #FFFF99'>Suchen und Ersetzen per VBA
CADmium am 14.12.2010 um 10:30 Uhr (0)
du durchläufst die datenbank der Zeichnung , überprüfst die Properties der Objekte, wenn Text, wie ist der Textinhalt und stimmt der mit dem gesuchten überein ? ..... das werden einige Codezeileneine andere Variante ist , acad "und-color: #FFFF99'>suchen " zu lassen, das geht über Auswahlsätze und Auswahlfilter .. sind aber auch mehrere Zeile Code.Einen Befehl "Suche TEXT "ABC" " gbt es nicht.------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte de ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : und-color: #FFFF99'>Suchen und Ersetzen per VBA
CADmium am 14.12.2010 um 10:03 Uhr (0)
Zitat:Original erstellt von michimueller85:also gibts da wohl nix oder? (für VBA)wenns nix gibt, schreib was !!! Wo ist das Problem ? ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
